home *** CD-ROM | disk | FTP | other *** search
/ Mail Madness! 45 / Mail_Madness_45_200x_-_Side_B.d64 / B 01. B (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  354b  |  14 lines
  1. 10 rem save"@:[194] 01.         [194]",12
  2. 15 lw=peek(186):poke53265,11:poke53280,0:poke53281,0:poke646,0:print"[147][144]";
  3. 20 if a=0 then a=1:load"[194] 02.*",lw,1
  4. 21 if a=1 then a=2:load"[194] 04.*",lw,1
  5. 22 if a=2 then a=3:load"[194] 09.*",lw,1
  6. 30 poke 53272,19:poke 56576,195
  7. 35 poke53265,11:poke646,0
  8. 40 na$="[194] 03.*"
  9. 50 print"[147][144]l[207]"chr$(34)na$chr$(34)",";lw
  10. 60 print"[144]run":print"[144]run"
  11. 70 poke 631,19:poke 632,13:poke 633,13
  12. 80 poke 198,3
  13. 90 end
  14.